home *** CD-ROM | disk | FTP | other *** search
/ Disc Station 14 / Disc Station Vol 14.BIN / menu / startup.mct < prev    next >
Text File  |  1997-02-14  |  56KB  |  1,840 lines

  1. ; TAB 4
  2.  
  3. ;++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  4. ;    DSmenu installer controler 'Artysia' menu version
  5. ;
  6. ;    1996  Programed by Nozomi
  7. ;++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  8.  
  9. ;/////////////////////////////////////
  10. ;
  11. ;    âCâôâXâgü[âïëµû╩é╠ôoÿ^
  12. ;
  13. ;/////////////////////////////////////
  14.  
  15. @Effect 20, 245, 8
  16. @sndload DSmenu.mlk
  17. $snd = 0
  18. $mode = 4
  19. @snd $snd
  20. @pcmload DSmenu.wlk
  21.  
  22. @INSTgrp    popup14, (20, 14),20            ; âCâôâXâgü[âïÄ₧é╔ò\Īé╖éΘâOâëâtâBâbâNé╠âìü[âh
  23. @INSTmater    mater14, 34, 3,20            ; âCâôâXâgü[âïÅ≤æ╘é╠ò\Īâüü[â^ü[é╠âìü[âh
  24. @INSTmaterSet    (2, 20)                    ; âüü[â^ü[é╠ò\Īê╩Æu
  25. @INSTchr    puyo14, 8, 7,20,20            ; âüü[â^ü[Åπé≡ô«é¡âLâââëé╠âìü[âh
  26. @INSTchrSet    0, 3, 0, 2, 1, 3, 4, 2, 1        ; âAâjâüÉ▌ÆΦ ê┌ô«Æå
  27. @INSTchrSet    1, 3, 0, 2, 1, 3, 4, 2, 1        ; âAâjâüÉ▌ÆΦ ÅIù╣
  28. @INSTmess    instme14, (0, 1), 40, 4, 20,20        ; âCâôâXâgü[âïÆåé╚é╟é╠âüâbâZü[âWé╠âìü[âh
  29. @INSTmessSet    0, 12, 0                ; âCâôâXâgü[âïÆå
  30. @INSTmessSet    1, 12, 1                ; âCâôâXâgü[âïÅIù╣
  31. @INSTmessSet    2, 12, 2                ; âAâôâCâôâXâgü[âïÆå
  32. @INSTmessSet    3, 12, 3                ; âAâôâCâôâXâgü[âïÅIù╣
  33. @INSTmessSet    4, 12, 4                ; âZü[âuâfü[â^æ▐ö≡Æå
  34. @INSTmessSet    5, 12, 5                ; âZü[âuâfü[â^æ▐ö≡ÅIù╣
  35. @INSTmessSet    6, 12, 6                ; âZü[âuâfü[â^ò£î│Æå
  36. @INSTmessSet    7, 12, 7                ; âZü[âuâfü[â^ò£î│ÅIù╣
  37. @INSTmessSet    8, 12, 8                ; âüâjâàü[âCâôâXâgü[âïÆå
  38. @INSTmessSet    9, 12, 9                ; âüâjâàü[âCâôâXâgü[âïÅIù╣
  39.  
  40. @INSTmodeLoad mode14, (20, 0), 40, 4,20,20        ; âéü[âhò\Īùpébéfâìü[âh
  41. @INSTmodeSet    0, 1, 1                    ; âCâôâXâgü[âïâéü[âh
  42. @INSTmodeSet    1, 1, 3                    ; âQü[âÇâfü[â^æ▐ö≡âéü[âh
  43. @INSTmodeSet    2, 1, 4                    ; âQü[âÇâfü[â^ò£î│âéü[âh
  44. @INSTmodeSet    3, 1, 2                    ; âAâôâCâôâXâgü[âïâéü[âh 
  45. @INSTmodeSet    4, 1, 0                    ; ïNô«âéü[âh 
  46.  
  47.  
  48. ;//////////////////////////////////////////////////////////////////
  49. ;
  50. ;    âVâXâeâÇÅεò±é╠É▌ÆΦ
  51. ;
  52. ;/////////////////////////////////////////////////////////////////
  53.  
  54. @SYSinstDir DiscStation14            ; âCâôâXâgü[âïâfâBâîâNâgâè
  55. @SYSCDvolume DS14                ; ébécé╠â{âèâàü[âÇâëâxâï
  56. @SYSappName DiscStation14            ; âAâvâèâPü[âVâçâôû╝
  57. @SYSregKey DS14                    ; âîâWâXâgâèâLü[û╝
  58. @SYSuninst DSshell.exe                ; âAâôâCâôâXâgü[âëü[
  59. @SYSdrvType CD, HD                ; âCâôâXâgü[âïî│ü^ɵé╠âhâëâCâué╠Äφù▐ Ä⌐ô«îƒì⌡é╡é▄é╖
  60. ;@SYSdrvType MO, HD                ; âCâôâXâgü[âïî│ü^ɵé╠âhâëâCâué╠Äφù▐ Ä⌐ô«îƒì⌡é╡é▄é╖
  61. @SYSmenuName écérâüâjâàü[            ; âüâjâàü[û╝ âXâ^ü[âgâüâjâàü[é╔ò\Īé│éΩéΘ
  62. @SYSmenuPath InstMenu                ; ébécôαé╠âüâjâàü[é╠éáéΘâfâBâîâNâgâè
  63. @SYSmenu    DSshell.exe            ; âüâjâàü[ïNô«âvâìâOâëâÇ
  64. @SYSload sysico14, 13, 11,20,20            ; âVâXâeâÇâAâCâRâôé╠âìü[âh
  65.  
  66. @DRAWdisable                    ; ò`ëµï╓Ä~
  67. @LOGOload logo14, 24, 8,20,20                ; âQü[âÇâ^âCâgâïé╠âìü[âh
  68. @MENUload DSgame14, 13, 11,20,20        ; âQü[âÇé╠âAâCâRâôé╠âìü[âh
  69. @Wall main14 ,20                    ; ò╟Äåâìü[âh
  70.  
  71. @GOSUB :sysiconinit                ; âVâXâeâÇâAâCâRâôé╠É▌ÆΦ
  72. @GOSUB :gameinit                ; âQü[âÇâfü[â^é╠É▌ÆΦ
  73. @DRAWenable                    ; ò`ëµïûë┬
  74.  
  75. $start = 0
  76.  
  77. ;//////////////////////////////////////////////////////////////////////
  78. ;
  79. ;    âüâCâôâïü[âv
  80. ;
  81. ;/////////////////////////////////////////////////////////////////////
  82.  
  83. :init
  84.  
  85. @DRAWdisable                    ; ò`ëµï╓Ä~
  86.  
  87. @INSTmode $mode                    ; âüâjâàü[âéü[âhé╠ò\Ī
  88.  
  89. @GOSUB :sysiconset                ; âVâXâeâÇâAâCâRâôé╠ò\Ī
  90.  
  91.  
  92. ; âQü[âÇâAâCâRâôé╠ò\Īü^É▌ÆΦ
  93. @GOSUB :GenseSetInst                ;î╢ÉóÉîî╒ô`é╠âAâCâRâôò\Īü^É▌ÆΦé╓
  94. @GOSUB :HeartSetInst                ;é╠ü[âRâlânü[âgâëâôâhé╠âAâCâRâôò\Īü^É▌ÆΦé╓
  95. @GOSUB :MadoSetInst                ;âïâïü[é╠ôSî¥Åtïxé▌é╠âAâCâRâôò\Īü^É▌ÆΦé╓
  96. @GOSUB :Saru2SetInst
  97. @GOSUB :EldoradoSetInst
  98. @GOSUB :NpSetInst
  99. @GOSUB :AnimeSetInst
  100. @GOSUB :MovieSetInst
  101.  
  102. @IF $start != 0 :loopA
  103. @DRAWenable                    ; ò`ëµïûë┬
  104. @Effect 20, 245, 10
  105. $start = 1
  106.  
  107. :loopA
  108.  
  109. @DRAWenable                    ; ò`ëµïûë┬
  110.  
  111. :loop                        ; é▒é╠éQìsé≡ëäüXé╞ë±éΦæ▒é»é▄é╖ é╜é╛ëäüXé╞üEüEüE
  112. @ICONenable
  113. @Goto :loop                    ; üié╜é╛é╡üAâAâCâRâôé≡âNâèâbâNé╖éΘé▄é┼üj
  114.  
  115. :exec
  116. @IF $mode == 4 :loop
  117. @pcm 0
  118. $mode = 4                    ; ïNô«âéü[âh
  119. @GOTO :init
  120.  
  121. :inst
  122. @IF $mode == 0 :loop
  123. @pcm 0
  124. $mode = 0                    ; âCâôâXâgü[âïâéü[âh
  125. @GOTO :init
  126.  
  127. :store
  128. @IF $mode == 1 :loop
  129. @pcm 0
  130. $mode = 1                    ; âQü[âÇâfü[â^æ▐ö≡âéü[âh
  131. @GOTO :init
  132.  
  133. :restore
  134. @IF $mode == 2 :loop
  135. @pcm 0
  136. $mode = 2                    ; âQü[âÇâfü[â^ò£î│âéü[âh
  137. @GOTO :init
  138.  
  139. :uninst
  140. @IF $mode == 3 :loop
  141. @pcm 0
  142. $mode = 3                    ; âAâôâCâôâXâgü[âïâéü[âh
  143. @GOTO :init
  144.  
  145. :exit
  146. @pcm 0
  147. @END                        ; écérâüâjâàü[é╠ÅIù╣
  148.  
  149.  
  150. ;///////////////////////////////////////////////////////////////////////
  151. ;
  152. ;    âVâXâeâÇâAâCâRâôé╠É▌ÆΦ
  153. ;
  154. ;//////////////////////////////////////////////////////////////////////
  155.  
  156. :sysiconinit
  157.  
  158. @MENUset exec(0),1, 5, 0                        ; ébécïNô«âAâCâRâôé╠É▌ÆΦ
  159. @MENUset exec(1),1, 5, 6                       ; ébécïNô«âAâCâRâôé╠É▌ÆΦ
  160. @MENUlogoSet (28, 38), 21            ; ébécïNô«âìâSé╠ê╩ÆuÉ▌ÆΦ
  161.  
  162. @MENUset inst(0), 1, 5, 1            ; âCâôâXâgü[âïâAâCâRâôé╠É▌ÆΦ
  163. @MENUset inst(1), 1, 5, 7            ; âCâôâXâgü[âïâAâCâRâôé╠É▌ÆΦ
  164. @MENUlogoSet (28, 38), 22            ; âCâôâXâgü[âïâìâSé╠ê╩ÆuÉ▌ÆΦ
  165.  
  166. @MENUset uninst(0), 1, 5, 2            ; âAâôâCâôâXâgü[âïâAâCâRâôé╠É▌ÆΦ
  167. @MENUset uninst(1), 1, 5, 8            ; âAâôâCâôâXâgü[âïâAâCâRâôé╠É▌ÆΦ
  168. @MENUlogoSet (28, 38), 23            ; âAâôâCâôâXâgü[âïâìâSé╠ê╩ÆuÉ▌ÆΦ
  169.  
  170. @MENUset store(0), 1, 5, 3            ; æ▐ö≡âAâCâRâôé╠É▌ÆΦ
  171. @MENUset store(1), 1, 5, 9            ; æ▐ö≡âAâCâRâôé╠É▌ÆΦ
  172. @MENUlogoSet (28, 38), 24            ; æ▐ö≡âìâSé╠ê╩ÆuÉ▌ÆΦ
  173.  
  174. @MENUset restore(0), 1, 5, 4                       ; ò£î│âAâCâRâôé╠É▌ÆΦ
  175. @MENUset restore(1), 1, 5, 10               ; ò£î│âAâCâRâôé╠É▌ÆΦ
  176. @MENUlogoSet (28, 38), 25            ; ò£î│âìâSé╠ê╩ÆuÉ▌ÆΦ
  177.  
  178. @MENUset exit(0), 1, 5, 5             ; ÅIù╣âAâCâRâôé╠É▌ÆΦ
  179. @MENUlogoSet (28, 38), 26            ; ÅIù╣âìâSé╠ê╩ÆuÉ▌ÆΦ
  180. @RET
  181.  
  182.  
  183. :sysiconset
  184.  
  185. @IF $mode == 4 :exec1
  186. @MENUput exec(0), (1, 48)            ; ïNô«âAâCâRâôé╠ò\Ī
  187. @Goto :exec2
  188. :exec1
  189. @MENUput exec(1), (1, 48)            ; ïNô«âAâCâRâôé╠ò\Ī
  190. :exec2
  191. @MENUlogo exec, 0                ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
  192. @MENUgoto exec, :exec                ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
  193.  
  194. @IF $mode == 0 :inst1
  195. @MENUput inst(0), (14, 48)            ; âCâôâXâgü[âïâAâCâRâôé╠ò\Ī
  196. @Goto :inst2
  197. :inst1
  198. @MENUput inst(1), (14, 48)            ; âCâôâXâgü[âïâAâCâRâôé╠ò\Ī
  199. :inst2
  200. @MENUlogo inst, 0                ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
  201. @MENUgoto inst, :inst                ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
  202.  
  203. @IF $mode == 3 :uninst1
  204. @MENUput uninst(0), (27, 48)                ; âAâôâCâôâXâgü[âïâAâCâRâôé╠ò\Ī
  205. @Goto :uninst2
  206. :uninst1
  207. @MENUput uninst(1), (27, 48)                    ; âAâôâCâôâXâgü[âïâAâCâRâôé╠ò\Ī
  208. :uninst2
  209. @MENUlogo uninst, 0                    ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
  210. @MENUgoto uninst, :uninst            ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
  211.  
  212. @IF $mode == 1 :store1
  213. @MENUput store(0), (40, 48)            ; æ▐ö≡âAâCâRâôé╠ò\Ī
  214. @Goto :store2
  215. :store1
  216. @MENUput store(1), (40, 48)            ; æ▐ö≡âAâCâRâôé╠ò\Ī
  217. :store2
  218. @MENUlogo store, 0                ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
  219. @MENUgoto store, :store                ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
  220.  
  221. @IF $mode == 2 :restore1
  222. @MENUput restore(0), (53, 48)                    ; ò£î│âAâCâRâôé╠ò\Ī
  223. @Goto :restore2
  224. :restore1
  225. @MENUput restore(1), (53, 48)                ; ò£î│âAâCâRâôé╠ò\Ī
  226. :restore2
  227. @MENUlogo restore, 0                ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
  228. @MENUgoto restore, :restore            ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
  229.  
  230. @MENUput exit(0), (66, 48)            ; ÅIù╣âAâCâRâôé╠ò\Ī
  231. @MENUlogo exit, 0                ; ò\Īé╖éΘâìâSé╠ÄwÆΦ
  232. @MENUgoto exit, :exit                ; âNâèâbâNÄ₧é╠ö≥é╤ɵ
  233.  
  234.  
  235. @MENUdisp store, 1                ; storeâìâSé≡ò\Ī    ûóÄgùp
  236. @MENUdisp restore, 1                ; storeâìâSé≡ò\Ī    ûóÄgùp
  237. @MENUdisp inst, 1                ; storeâìâSé≡ò\Ī    ûóÄgùp
  238. @MENUdisp uninst, 1                ; storeâìâSé≡ò\Ī    ûóÄgùp
  239.  
  240. @RET
  241.  
  242. ;////////////////////////////////////////////////////////////////////////
  243. ;
  244. ;    âQü[âÇâAâCâRâôü^Åεò±é╠É▌ÆΦ
  245. ;
  246. ;////////////////////////////////////////////////////////////////////////
  247. :gameinit
  248.  
  249. ;é╠ü[âRâlânü[âgâëâôâhÉ▌ÆΦ
  250. @MENUset Heart(0), 0, 3,25,26,27,25,25            ; âQü[âÇâAâCâRâôé╠É▌ÆΦ    Æ╩Åφ
  251. @MENUset Heart(2), 0, 3,52,53,54,52,52          ; âQü[âÇâAâCâRâôé╠É▌ÆΦ    æIæ≡òsë┬
  252. ;@MENUclip Heart, 0, 0, 104, 88
  253. @MENUlogoSet (28, 38), 36, 34            ; âQü[âÇâìâSé╠ê╩ÆuÉ▌ÆΦ
  254. @GAMEname Heart, ânü[âgâëâôâh            ; âQü[âÇû╝é╠É▌ÆΦ
  255. @GAMEexeFile Heart, NTC96.exe            ; âQü[âÇé╠Ä└ìsâtâ@âCâïû╝é╠É▌ÆΦ
  256. @GAMECDdir Heart, Heart                ; ébécôαé╠âfâBâîâNâgâèé╠É▌ÆΦ
  257.  
  258.  
  259. ;î╢ÉóÉîî╒ô`É▌ÆΦ
  260. @MENUset Gense(0), 0, 3, 0, 1, 2, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 2, 0, 0, 0, 0, 0 ;âQü[âÇâAâCâRâôé╠É▌ÆΦ    Æ╩Åφ
  261. @MENUset Gense(1), 0, 3,57,58,59,57,57,57,57,57,57,57,57,57,57,59,57,57,57,57,57 ;âQü[âÇâAâCâRâôé╠É▌ÆΦ  ûóâCâôâXâgü[âï
  262. @MENUset Gense(2), 0, 3,30,31,32,30,30,30,30,30,30,30,30,32,30,32,30,30,30,30,30 ;âQü[âÇâAâCâRâôé╠É▌ÆΦ  æIæ≡òsë┬
  263. @MENUclip Gense,